(shell-mode): Capitalize mode name.

diff --git a/lisp/shell.el b/lisp/shell.el
index bf7d2b820e43f5271fe1de00a29fdfab376b5066..1f69e426d91930ce95e947e56ed650668cd23c74 100644 (file)
--- a/lisp/shell.el
+++ b/lisp/shell.el
@@ -228,7 +228,7 @@ to match their respective commands."
   (comint-mode)
   (setq comint-prompt-regexp shell-prompt-pattern)
   (setq major-mode 'shell-mode)
-  (setq mode-name "shell")
+  (setq mode-name "Shell")
   (use-local-map shell-mode-map)
   (make-local-variable 'shell-dirstack)
   (setq shell-dirstack nil)